program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

procedure AddToBegin (var head:pelement; num:integer);
begin
  tmp:=head;
  new(head);
  head^.value:=num;
  head^.next:=tmp;
end;


begin
  { TODO -oUser -cConsole Main : Insert code here }
end.
 